# name : CI of prop diff (newcombe)
# key : freq.prop.diff.ci.recommended_no_strata
# contributor: Shuguang Sun
# --
** Newcombe is recommend by Fagerland2011 recom_confid_inter_for_two;
ods output pdiffcls=${4:pdiffci};
proc freq data=${1:dtin};
  tables ${2:trt} * ${3:resp} / riskdiff(cl = NEWCOMBE);
  weight count;
run;
